

; Regla que recomienda el modelo tm2-1020es si se cumplen todos sus
; requisitos (consultar lista de modelos).

(defrule tm2-1020es
	(sistema (nombre ?nombreSO)(version ?version)(bits ?bits))
	(test (or (eq ?nombreSO "n")(eq ?nombreSO "Windows")))
	(test (or (eq "n" ?version)(eq ?version "7")))	
	(test (or (eq 0 ?bits)(eq ?bits 64)))
	(procesador (fabricante ?fab)(modelo ?mod)(velocidad_min ?v1)(velocidad_max ?v2))
	(test (or (eq "n" ?fab)(eq ?fab "Intel")))
	(test (or (eq "n" ?mod)(eq ?mod "Pentium SU4100")))
	(test (or (eq ?v1 0.0)(<= ?v1 1.3)))
	(test (or (eq ?v2 0.0)(>= ?v2 1.3)))
	(memoria (actual_min ?mem1)(actual_max ?mem2))
	(test (or (eq ?mem1 0)(<= ?mem1 4)))
	(test (or (eq ?mem2 0)(>= ?mem2 4)))
	(disco (tam_min ?tam1)(tam_max ?tam2))
	(test (or (eq ?tam1 0)(<= ?tam1 320)))
	(test (or (eq ?tam2 0)(>= ?tam2 320)))	
	(pantalla (modelo ?modPan)(tam_min ?pan1)(tam_max ?pan2))
	(test (or (eq ?modPan "n")(eq ?modPan "LED")))
	(test (or (eq ?pan1 0.0)(<= ?pan1 12.1)))
	(test (or (eq ?pan2 0.0)(>= ?pan2 12.1)))
	(grafica (fabricante ?fabGraf)(modelo ?graf))
	(test (or (eq ?fabGraf "n")(eq ?fabGraf "ATI")))
	(test (or (eq ?graf "n")(eq ?graf "Radeon HD 4550")))
	(conexiones (wifi ?wifi)(blue ?blue))
	(test (or (eq ?wifi "n")(eq ?wifi "Si")))
	(test (or (eq ?blue "n")(eq ?blue "Si")))
	(otros (celdas ?celdas)(peso_min ?pMin)(peso_max ?pMax))
	(test (or (eq ?celdas 0)(eq ?celdas 6)))	
	(test (or (eq ?pMin 0.0)(<= ?pMin 2.15)))
	(test (or (eq ?pMax 0.0)(>= ?pMax 2.15)))
	(precio (cantidad_min ?p1))
	(precio (cantidad_max ?p2))
	(test (or (eq ?p1 0.0)(<= ?p1 899)))
	(test (or (eq ?p2 0.0)(>= ?p2 899)))
	=>
	(assert (modelo_aconsejado (modelo TouchSmart:tm2-1020es)))
)

; Regla que recomienda el modelo tx2-1350es si se cumplen todos sus
; requisitos (consultar lista de modelos).

(defrule tx2-1350es
	(sistema (nombre ?nombreSO)(version ?version)(bits ?bits))
	(test (or (eq ?nombreSO "n")(eq ?nombreSO "Windows")))
	(test (or (eq "n" ?version)(eq ?version "7")))	
	(test (or (eq 0 ?bits)(eq ?bits 64)))
	(procesador (fabricante ?fab)(modelo ?mod)(velocidad_min ?v1)(velocidad_max ?v2))
	(test (or (eq "n" ?fab)(eq ?fab "AMD")))
	(test (or (eq "n" ?mod)(eq ?mod "Turion Dual-Core RM-77")))
	(test (or (eq ?v1 0.0)(<= ?v1 2.3)))
	(test (or (eq ?v2 0.0)(>= ?v2 2.3)))
	(memoria (actual_min ?mem1)(actual_max ?mem2))
	(test (or (eq ?mem1 0)(<= ?mem1 4)))
	(test (or (eq ?mem2 0)(>= ?mem2 4)))
	(disco (tam_min ?tam1)(tam_max ?tam2))
	(test (or (eq ?tam1 0)(<= ?tam1 500)))
	(test (or (eq ?tam2 0)(>= ?tam2 500)))	
	(pantalla (modelo ?modPan)(tam_min ?pan1)(tam_max ?pan2))
	(test (or (eq ?modPan "n")(eq ?modPan "LED")))
	(test (or (eq ?pan1 0.0)(<= ?pan1 12.1)))
	(test (or (eq ?pan2 0.0)(>= ?pan2 12.1)))
	(grafica (fabricante ?fabGraf)(modelo ?graf))
	(test (or (eq ?fabGraf "n")(eq ?fabGraf "ATI")))
	(test (or (eq ?graf "n")(eq ?graf "Radeon HD 3200")))
	(conexiones (wifi ?wifi)(blue ?blue))
	(test (or (eq ?wifi "n")(eq ?wifi "Si")))
	(test (or (eq ?blue "n")(eq ?blue "Si")))
	(otros (celdas ?celdas)(peso_min ?pMin)(peso_max ?pMax))
	(test (or (eq ?celdas 0)(or (eq ?celdas 4)(eq ?celdas 8))))	
	(test (or (eq ?pMin 0.0)(<= ?pMin 1.97)))
	(test (or (eq ?pMax 0.0)(>= ?pMax 1.97)))
	(precio (cantidad_min ?p1))
	(precio (cantidad_max ?p2))
	(test (or (eq ?p1 0.0)(<= ?p1 1099)))
	(test (or (eq ?p2 0.0)(>= ?p2 1099)))
	=>
	(assert (modelo_aconsejado (modelo TouchSmart:tx2-1350es)))
)



